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ey 1 Q MODULE OPCSUNKNOWN i ‘ 

¢ § ‘ ‘ibent Ss (8 18839) « 

ee 005 
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3 'e * 
3 8 4 '® COPYRIGHT (c) 1978, 1980, 1982, 1984 8B * 
; ia '® DIGITAL EQUIPMENT EORPORATION, MAYNARD. MASSACHUSETTS. * 
b 19 Biy i ALL RIGHTS RESERVED. : 
: \§ O0t¢ 8 le rae ee i$ FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * 
4 1 01 'w ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * 
$ 1G 0014 QO !* INCLUSI OF THE ABOVE COPYRIGHT NOTICE. THIS A OR ANY OTHER w 
4 15 0015 0 !« ak a THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
3 16 Bog 8 'e R PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
; i? EA ° TRANSFERRED D. * 
° * * 
4 19 0019 6 '* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
; $f b05s '® AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
F 1 Be 1 8 CORPORATION. * 
3 'e * 
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: % 0086 9 is 
: 3 54 i weeeeeeeeeeeneeeeeeeeeeeneneeteeeeeeeetenerereeeeeneeeeeneeeeeeeeeeeeereeeee 
: : 00 § 6 'e¢ 

; 4 4 ? 8 FACILITY: 

; : 0032 0 OPCOM 

: 34 0034 0 ABSTRACT: 

: % Oo 89 0 This module contains the specialized logic to service 

; $ th 3 a@ particular type of request sent by a user to OPCOM. 

: 4 ot 0 Environment: 

; re Bye : VAX/VMS operating system. 

: rh Go4§ 8 Author: 

; cz G93 0 Steven T. Jeffreys 

: rtf 0047 0 Creation date: 

; 49 0049 March 10, 1981 

: 3 Bo Revision history: 

; § 09838 i v03-001 CWH3001 CW Hobbs 30-Jul-1983 

; 54 i Various and sundry things to make OPCOM distributed 

‘eee B23 i across the cluster. 
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LIBRARY *L1B$:0PCOM 


FORWARD ROUTINE 
UNKNOWN_HANDLER 


BUILTIN 
peseur 
REMQUE ; 


LIBRARY ‘SYSSLIBRARY: L18. L32'; 
COMLIB'; 


: NOVALUE; 
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! Start of UNKNOWN 


! Insert entry onto a queue 
! Remove entry from a queue 
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GLOBAL ROUTINE UNKNOWN_HANDLER (BUFFER_DESC) : NOVALUE = 


‘oe 
! Functional description: 


This routine is the handler for all unrecognized messages 
received by OPCOM. This routine will keep a Log of these 
messages and then return, effectively ignoring the message. 
Input: 


BUFFER_DESC : The address of a quetuere buffer descriptor pointing 
describes the buffer containing the message. 


Implicit Input: 
None. 
Output: 

None. 
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009 

009 Implict output: 

0094 

044 Some accounting data will be updated. 
sia 4 Side effects: 

00 The message is ignored, and OPCOM will 


0100 porceed as if it had never received it. 
Routine value: 


None. 


! Start of UNKNOWN_HANDLER 


BUF FER_DESC : $ref_bblock; 


EXTERNAL ROUTINE 
DUMP _LOG_FILE; 


EXTERNAL , 
UNKNOWN_MESSAGE_COUNT : LONG; ! Count of all unknown messages received 


' 
: Increment the count of unknown messages received. 


UNKNOWN_MESSAGE_COUNT = .UNKNOWN_MESSAGE_COUNT ¢ 1; 


' 
; Dump the message in the log file 
DUMP_LOG_FILE (.BUFFER_DESC, ZASCID '- Unknown message received’); 
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; Routine Size: 


; 130 0129 1 

; (131 0130 1€ 
3 132 0131 O€ 
3 Nane 

: SPLITS 

: SCODES 

: File 

i .$255$DUA28:(SYSLIBILI 


19 bytes, 


-L32;1 


"$255$DUA28 : COPCOM.OBJ JOPCOMLIB.L32;1 


00006 CF 


Routine Base: $CODE$ + 0000 


PSECT SUMMARY 
Bytes 
36 NOVEC,NOWRT, 


19 NOVEC, *NOWRT. RD , 
Library Statistics 
ee Symbols 
Total Loaded 
18619 1 
633 1 


ybdeo-1984 0):58%) 


AX-11 Otis s-32 V4.0-74 
OPCOM. SRC S UNKNOWN. B32: 


! End of UNKNOWN_HANDLER 
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Attributes 


RD ,NOEXE,NOSHR, 


EXE ,NOSHR, 


Percent 
0 
0 


»PSECT 


-EXTRN 


End of 


- TITLE 
ENT 


LCL, REL, 
LCL, 


OPCSUNKNOWN 
\v04-000\ 


SPLITS,NOWRT ,NOEXE,2 
«ASCII \= Unknown message received\<0> 


ONG 17694747 
“ADDRESS P.AAB 


DUMP_LOG_FILE, UNKNOWN_MESSAGE_COUNT 
S$CODES,NOWRT,2 


UNKNOWN_HANDLER, Save nothing 
2 MESSAGE _COUNT 


BUFFER DESC 
We, DUAP. LOG_FILE 


UNKNOWN 


CON,NOPIC,A a ents 
REL, CON,NOPIC,ALIGN(2) 


Pages Processing 
Mapped Time 


1099 00:01.9 
4 00:00.8 
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; COMMAND QUALIFIERS 
; BLISS/CHECK=(FIELD, INITIAL OPTIMIZE) /LIS=L1S$:UNKNOWN/OBJ=OBJ$: UNKNOWN MSRC$:UNKNOWN/UPDATE =(ENHS : UNKNOWN) 


; Size: ih) + 36 data bytes 
; Run Time: HEY 
; Elapsed Time: 


3 Lines/CPU Min: tus 

; a 1901 
3; Memor 1 vt : 42 pages 
; Compilation Complete 
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